{%mainunit bitcoin_p2p.pas}

{$IFDEF INTERFACE}
type
  TMsgGetdata = class(TMsg)
    class function GetCommand: Tp2pCommand; override;
  end;

{$ENDIF}
{$IFDEF IMPLEMENTATION}

class function TMsgGetdata.GetCommand: Tp2pCommand;
begin
  Result := 'getdata'#0#0#0#0#0;
end;

{$ENDIF}
